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Sy 
Ll 
Ll 
Ll 
Ll 
Ll 
Ll 
Ll 
Ll 
Ll 
Ll 
LLL IIIIIIIII BBBBBBBBBBBB RRRRRRRRRRRR TTTTTTTTTTTTTTT «LLL Ll 
LLL HII BBBBBBBBBBBB RRRRRRRRRRRR TTTTTTTTTTTTITTT «LLL + 
LLL LITT BBB RRRRRRRRRRRR TTTTTTTTTITITITT «LLL L 
LLL 111 BBB BBB RRR RRR TTT LLL | Ll 
LLL II] BB BBB RRR RRR TTT LLL LI 
LLL 11] BBB BBB RRR RRR TTT LLL | Ll 
LLL II] BBB BBB RRR RRR TTT LLL | Ll 
LLL Il] BBB RRR RRR TTT LLL Ll 
LLL Il] BBB BBB RRR RRR TTT LLL Ll 
LLL III B RRRRRRRRRRRR TTT LLL Ll 
LLL Ill BBBBBBBBBBBB RRRRRRRRRRRR TTT LLL LI 
LLL Ill 8 RRRRRRRRRRRR TTT LLL ul 
LLL III BRA BBB RRR RRR TTT LLL 
LLL II] BBB RRR RRR TTT LLL Ll 
LLL II] BER BBB RRR RRR TTT LLL Ll 
LLL II] BRB BBB RRR RRR TTT LLL Ll 
LLL III ERB BBB RRR RRR TTT LLL Ll 
LLL Ill BSB BB RRR RRR TTT LLL Ll 
LLELLLLLLLLLLLLL IIIIIIIII BBBBBBBBBBBB RRR RRR TTT LELLLLLLLLLLLLL Ll 
LLELLLLLLLLLLLLL TITIII111 BBBBBBBBBBBB RRR RRR TTT LI 
LLELLLLLLLLLLLLL LIIIIIII BBBBBBBBBBBB RRR RRR TTT LELLLLLLLLLLLLL 
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**F ILE*#1D**STRMOVO 5! 
SSSSSSSS TTTTTTTTTT RRRRRRRR = MM mm = 000000 vv vv aaaaaa : 
SSSSSSSS TTTTITTTTT RRRRRRRR MM mM = 000000 —ss«WV vv aaaaaa : 

SS TT RR RR MMMM MMMM = 00 00 vv VV QQ aa ‘ 
SS TT RR RR MMMM MMMM 00 00 vv vv QQ Qa : 
SS TT RR RR MM 00 00 vw vv QQ Qa : 
SS TT RR RR MM MM MM 00 00 vv vv Qa QQ : 
SSSSSS TT RRRRRRRR MM MM 00 00 vw vv Qa aa : 
SSSSSS TT RRRRRRRR MM mM 00 00 vv vv Qa aa ; 
SS TT RR RR MM mM 00 00 vv VV a2 aa aa ; 

SS TT RR RR MM mM 00 00 vv vw aa aa aa ; 

SS TT RR RR MM MM 00 00 vv vw Qa aa er ; 

S$ TT RR RR MM mM 00 00 wW ew aa aa anen ; 
SSSSSSSS TT RR RR MM MM = 000000 vv aaqa ad ones ; 
SSSSSSSS TT RR RR MM MM = 000000 wv aaaa aad once : 
LL HII SSSSSSSS F 
LL HII SSSSSSSS ; 
LL I] SS : 
LL I] SS : 
LL I] SS : 
LL I] ss : 
LL I] SSSSSS F 
LL I] SSSSSS ; 
LL I] SS F 
LL I] SS : 
LL I] SS ; 
LL I] ss : 
LLLLLLLLLL §=6sSIIIII «= SSSSSSSS ; 
LLLLLLLLLL §=sIIII = SSSSSSSS : 
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: mae Yi 90: +3; 38 PMTORTL. SRE TS STRMOVQ.MAR; 1 ve W) 1: 
-TITLE STRSSMOVO Move a quadyerd monolithicly 
-IDENT /1=003/ ; File: STRMOVQ.MAR 


: 


PARARBARARARRARLASLALALALALAALALE LASSE EES EASA EASE EERE RSE E ERE REESE EERE EEE EES 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


: ® 
:* ® 
*® ® 
*® ® 
:* ® 
it THIS SOFTWARE. IS FURNISHED UNDER A LICENSE AND MAY SE USED AND COPIED 
;* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE ®* 
:* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
;* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
;* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
:® TRANSFERRED. : 
** ® 
* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
* CORPORATION. . 
:® *® 
* *® 
*® * 
*® ® 
:® * 
® ® 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


COOCOCoCoooooooooooooo 
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; LARRRRARAAAAASALALALALALESALESES ESSE ERAS SAS ERASERS ERR RRR SEERA ESSER REAR ARES SS 
‘ 


-++ 
; FACILITY: String Package 


; ABSTRACT: This routine exists to allow STR$ routines written in BLISS 
; to use the VAX instruction MOVQ so that the address and Length 
ina Socertenee can be updated simultaneously, so that at AST 
level the user will get either the entire new string or the 
entire old string. 


; ENVIRONMENT: User Mode, AST Reentrant 


AUTHOR: R. WiLL, CREATION DATE: 9-Feb-79 
; MODIFIED BY: 
: Will, 9-Feb-79: VERSION 01 
1-001 - Seriet al 
; 1-002 - Minor edit to the TITLE and et t ings to conform to the 


RTL standard format. JBS 01-M 
; 1-003 - Make this a double dollar sign module. JBS 25-JUL-1979 
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DECLARA IONS 
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o 

[=] 

S 
SOooooooooooooooo: 


Sooooooooooooooeo 
SCOoQoQooooooooooo 
SOOCoooooooooooo 


SINS SSN SAA AAA AA AAO 


~ 


WO OONAUE NNO ODNOUE WN OVOONOUS 
. * 


Lithicl Doi 16=SEP=1 
monolithicly ene - 138 90:33 


.SBTTL DECLARATIONS 
: INCLUDE FILES: 


EXTERNAL DECLARATIONS: 
~DSABL GBL 


> MACROS: 
: EQUATED SYMBOLS: 
> OWN STORAGE: 


t PSECT DECLARATIONS: 


-PSECT _STRSCODE PIC, USR, CON, REL 
EXE, RD, NOWRT, 


‘38 


LONG 


AX/VMS Macro_V04-00 
LIBRTL. SRC STRMOVO. MAR; 1 


; Prevent undeclared 
; symbols from being 
; automatically global. 


LCL, SHR, - 
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.SBTTL STRSSMOVG_R1 


p++ 

: FUNCTIONAL DESCRIPTION: 
CALLING SEQUENCE: 

; INPUT PARAMETERS: 


NONE 
IMPLICIT INPUTS: 


OUTPUT PARAMETERS: 
NONE 

IMPLICIT OUTPUTS: 
NONE 


FUNCTION VALUE: 
COMPLETION CODES: 


NONE 
SIDE EFFECTS: 
NONE 


STRSSMOVQ_R1:: 
mova (RO), (RI) 
RSB 


- END 


This routine executes the VAX instruction MOVQ. 


JSB STRSSMOVQ_R1 


RO contains the address of the new descriptor data 
R1 contains the address of the descriptor to be modified 
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STRSSMOVOQ Move a quadword monolithicl 16-SEP-1984 335: AX/VMS Macro V04-00 Pa 
Symbol table ; . orSEp=1oke itesos LC taNTe. Sacsernacvecmar;1 °2% 4) 


STRSSMOVO_R1 00000000 RG = 01 


tena we ae owe mama ae 


! Psect synopsis ! 


¢ormeenmemeceaacecas + 


PSECT name Allocation PSECT No. Attributes 


- ABS. 00000000 < 0.) 60 ( 0.) NOPIC USR CON ABS LCL at NOEXE NORD NOWRT NOVEC BYTE 
_STRSCODE 00000004 < 4.) O1¢ 1.) PIC USR CON REL LCL SHR EXE RD NOWRT NOVEC LONG 


Phase Page faults CPU Time Elapsed Time 
Initialization 9 0:00:00.03 0:00:01.67 
pounene processing 153 09:09: 0:34 99:08:81 
Symbol table sort 0 69; : 93 0:00:00.00 
s 2 3 00:00:00.1 Se OG 
Syabot table output 2 00:00:0 +88 0:00:00.00 
Psect synopsis output 888858 8 0:00:00.01 
Cross-reference output 0:00:00. : eS Sa ge a! 
Assembler run totals 260 00:00:00.8 00:00:06.35 


The working set Limit was 750 pages. 
1104 bytes (3 pages) of virtual memory were used to buffer the intermediate code. 
There were 10 pages of symbol table space me ecaee to hold 1 non-local and 0 local symbols. 
128 source Lines were read in Pass 1, produci ng 8 object records in Pass 2. 
pages of virtual memory were used to define 0 macros. 


eT 


Macro Library name Macros defined 
“S255SDUAZB:(SYSLIBISTARLET.MLBs2 0 SS 0 
0 GETS were required to define 0 macros. 

There were no errors, warnings or information messages. 


MACRO/ENABLE=SUPPRESSION/DI SABLE=(GLOBAL , TRACEBACK) /LIS=LIS$:STRMOVQ/OBJ=0BJ$:STRMOVQ MSRC$:STRMOVQ/UPDATE=(ENHS$: STRMOVQ) 


AH-BI13A-SE DIGITAL EQUIPMENT CORPORATION 
VAX/VMS V4.0 CONFIDENTIAL AND PROPRIETARY 


a2! 


